Chip 2005 June/CHIP_CD_2005-06.iso/test/fruity/flstudio502_install.exe/Fruity Slicer.dll/0/RCDATA/TSYNTHEDITORFORM/TSYNTHEDITORFORM.txt

Text File | 2004-10-20 | 19KB | 661 lines

object SynthEditorForm: TSynthEditorForm
  Left = 232
  Top = 115
  BorderIcons = []
  BorderStyle = bsSingle
  Caption = 'SynthForm'
  ClientHeight = 240
  ClientWidth = 241
  Color = clBlack
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = True
  Position = poDefault
  Scaled = False
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object SynthPanel: TWPControl
    Left = 0
    Top = 0
    Width = 241
    Height = 240
    OnDropFiles = SynthPanelDropFiles
    Color = 5452845
    ParentColor = False
    ParentShowHint = True
    object WAVScope: THQWAVScope
      Tag = -1
      Left = 0
      Top = 116
      Width = 241
      Height = 71
      Cursor = crCross
      BackColor = clBlack
      CenterColor = clGray
      LineColor = 14532279
      LineColor_Right = 14532279
      OnPaint = WAVScopePaint
      OnMouseDown = WAVScopeMouseDown
      OnMouseMove = WAVScopeMouseMove
    end
    object ZGROpenBtn: TQuickBtn
      Tag = -1
      Left = 5
      Top = 21
      Width = 28
      Height = 19
      Cursor = crHandPoint
      Hint = '|Open sliced beat groove...'
      ParentFont = False
      ParentColor = False
      Color = 6709335
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -9
      Font.Name = 'Fruity fonts'
      Font.Style = []
      ShowHint = True
      ParentShowHint = False
      Options = [tbHasDownGlyph]
      AccelKey = 0
      Glyph.ILCount = 2
      BmpList = SynthResModule.BtnIL
      OnClick = ZGROpenBtnClick
      StayDown = False
    end
    object SampleOpenBtn: TQuickBtn
      Tag = -1
      Left = 37
      Top = 21
      Width = 28
      Height = 19
      Cursor = crHandPoint
      Hint = '|Open & slice up sample...'
      ParentColor = False
      Color = 6709335
      ShowHint = True
      ParentShowHint = False
      Options = [tbHasDownGlyph]
      AccelKey = 0
      Glyph.ILCount = 2
      BmpList = SynthResModule.BtnIL
      ILIndex = 2
      OnClick = SampleOpenBtnClick
      StayDown = False
    end
    object DumpBtn: TQuickBtn
      Tag = -1
      Left = 101
      Top = 21
      Width = 28
      Height = 19
      Cursor = crHandPoint
      Hint = '|Dump beat to piano roll'
      ParentColor = False
      Color = 6709335
      ShowHint = True
      ParentShowHint = False
      PopupMenu = SynthResModule.DumpToPRMenu
      Options = [tbHasDownGlyph]
      AccelKey = 0
      Glyph.ILCount = 2
      BmpList = SynthResModule.BtnIL
      ILIndex = 6
      StayDown = False
      PopupAlign = Popup_Bottom
      PopupButton = mbLeft
      BeforePopup = DumpBtnBeforePopup
    end
    object NameLabel: TQuickLabel
      Tag = -1
      Left = 3
      Top = 2
      Width = 130
      Height = 11
      Hint = '|Sample name'
      Options = [loTransparent, loNoFlicker, loEndEllipsis]
      Font.Charset = DEFAULT_CHARSET
      Font.Color = 16047827
      Font.Height = -9
      Font.Name = 'Fruity fonts'
      Font.Style = []
      ParentFont = False
    end
    object FadeOutWheel: TQuickSlider
      Tag = -1
      Left = 227
      Top = 31
      Width = 8
      Height = 71
      Cursor = crHandPoint
      Hint = '|Slices fade out'
      Options = [wwBigLine]
      MoveSpeed = 8
      SlowMotionDiv = 4
      Max = 100
      DefaultValue = 0
      OnChange = FadeInWheelChange
      OnRelease = FadeOutWheelRelease
      MouseButton = mbLeft
      HotSideX = 7
      HotSideY = 8
      PopupMenu = SynthResModule.WheelMenu
      BmpList = SynthResModule.VSliderIL
    end
    object OpenBSBtn: TQuickBtn
      Tag = -1
      Left = 69
      Top = 21
      Width = 28
      Height = 19
      Cursor = crHandPoint
      Hint = '|Slice up sample'
      ParentColor = False
      Color = 6709335
      ShowHint = True
      ParentShowHint = False
      PopupMenu = SynthResModule.SliceMenu
      Options = [tbHasDownGlyph]
      AccelKey = 0
      Glyph.ILCount = 2
      BmpList = SynthResModule.BtnIL
      ILIndex = 4
      StayDown = False
      PopupAlign = Popup_Bottom
      PopupButton = mbLeft
      BeforePopup = DumpBtnBeforePopup
    end
    object AutoDumpBtn: TQuickBtn
      Tag = -1
      Left = 1
      Top = 43
      Width = 73
      Height = 11
      Cursor = crHandPoint
      Hint = '|Dump beat to piano roll right after loading'
      ParentFont = False
      ParentColor = True
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clSilver
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
      Style = FS_Transparent
      Spacing = 4
      TextAlign = ttaRight
      AccelKey = 0
      FXType = FX_Blend
      BmpList = SynthResModule.LEDIL
      OnClick = AutoDumpBtnClick
      Down = True
      PopupAlign = Popup_Normal
    end
    object InvertBtn: TQuickBtn
      Tag = -1
      Left = 3
      Top = 57
      Width = 29
      Height = 11
      Cursor = crHandPoint
      Hint = '|Reverse selected slice'
      Enabled = False
      ParentFont = False
      ParentColor = True
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clSilver
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
      Style = FS_Transparent
      Spacing = 4
      AccelKey = 0
      FXType = FX_Blend
      FXAttack = 64
      BmpList = SynthResModule.RevBtnIL
      OnClick = InvertBtnClick
      PopupAlign = Popup_Normal
    end
    object FadeInWheel: TQuickSlider
      Tag = -1
      Left = 206
      Top = 31
      Width = 8
      Height = 71
      Cursor = crHandPoint
      Hint = '|Slices fade in'
      Options = [wwBigLine]
      MoveSpeed = 8
      SlowMotionDiv = 4
      Max = 100
      DefaultValue = 0
      OnChange = FadeInWheelChange
      OnRelease = FadeOutWheelRelease
      MouseButton = mbLeft
      HotSideX = 7
      HotSideY = 8
      PopupMenu = SynthResModule.WheelMenu
      BmpList = SynthResModule.VSliderIL
    end
    object PitchWheel: TQuickSlider
      Tag = -1
      Left = 135
      Top = 31
      Width = 8
      Height = 71
      Cursor = crHandPoint
      Hint = '|Pitch shift'
      Options = [wwBigLine]
      MoveSpeed = 160
      SlowMotionDiv = 20
      Min = -1200
      Max = 1200
      DefaultValue = 0
      OnChange = PitchWheelChange
      OnRelease = FadeOutWheelRelease
      MouseButton = mbLeft
      HotSideX = 7
      HotSideY = 8
      PopupMenu = SynthResModule.WheelMenu
      BmpList = SynthResModule.VSliderIL
    end
    object FGLengthWheel: TQuickSlider
      Tag = -1
      Left = 156
      Top = 31
      Width = 8
      Height = 71
      Cursor = crHandPoint
      Hint = '|^dFit (stretch slices) length'
      Options = [wwBigLine]
      MoveSpeed = 1600
      SlowMotionDiv = 100
      Min = -20000
      Max = 20000
      DefaultValue = 0
      OnChange = FGLengthWheelChange
      OnRelease = FadeOutWheelRelease
      MouseButton = mbLeft
      HotSideX = 7
      HotSideY = 8
      PopupMenu = SynthResModule.WheelMenu
      BmpList = SynthResModule.VSliderIL
    end
    object FGModeSelect: TSelector
      Tag = -1
      Left = 168
      Top = 61
      Width = 9
      Height = 32
      Cursor = crHandPoint
      Hint = '|Stretch mode'
      Hints.Strings = (
        'A (mirror - normal)'
        'B (mirror - fading)'
        'C (elastique - drums)'
        'D (elastique - tonal)')
      NumCols = 1
      NumRows = 4
      Glyph.ILCount = 2
      Glyph.Data = {
        2800000012000000E0FFFFFF0100080000000000800200000000000000000000
        000000000000000044392F00453A300052473D00554A400060554B0064594F00
        7C71670094897F00CCC1B7000C0600003B352E003E3831004F4942003A342C00
        3C362E003D372F003E3830003F393100413B3300403A3200423C34004F494100
        504A420035312C00554F4700575149005650480038342F0037332E003B373200
        3A3631003D3934004E483F004D473E00514B420036322C00534D4400544E4500
        575148005650470039352F0059534A00585249005B554C005A544B003C383200
        5D574E005C564D003E3A34005F5950005E584F00625C5300615B5200605A5100
        645E5500635D54004B463E004C473F004E494100514C4400524D450055504800
        544F470057524A0037342E00393630003A3731003C39330000E6FF0000A1E400
        0086BE0000B3FF00008AE300006DB800005D9E0000589200FFFFFF0000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        000000000000000036362914090909142A36363F304D4D4D1F19000036361405
        0604020014363630454447494B1F000037370906080201020937374D444C494A
        494D000037370904020106020937374D47494A44484D00003333090201060704
        0933334D494A444C474D00003333120002020403133333434B494847462D0000
        33331A13090909131A33333D2D4D4D4D2D3D0000343434343434343435343434
        34343434343500001A13090909131835353D2D4D4D4D1D3E3535000013050604
        02001335351D454447494B1D353500000906080201020931314D444C494A494D
        313100000904020106020931314D47494A44484D313100000902010607040931
        324D494A444C474D313200001100020204030B3232424B494847461E32320000
        250B0909090B2532323C1E4D4D4D1E3C323200003232323232322E2E2E323232
        3232322E2E2E0000250B09090910242E2E3C1E4D4D4D413B2E2E000010050604
        0200102E2F41454447494B412E2F0000090608020102092F2F4D444C494A494D
        2F2F0000090402010602092F2F4D47494A44484D2F2F0000090201060704092B
        2B4D494A444C474D2B2B00000F00020204030F2B2B284B494847461B2B2B0000
        220F0909090F162C2C161B4D4D4D1B0C2C2C00002B2B2B2C2C2C2C2C2C2B2B2B
        2C2C2C2C2C2C00002C2C160E0909090A152C2C0C404D4D4D1C3A00002C2C0A05
        060402000A2C2C1C454447494B1C000029290906080201020929294D444C494A
        494D000029290904020106020929294D47494A44484D00002A2A090201060704
        092A2A4D494A444C474D00002A2A0D00020204030D2A2A234B49484746230000
        2626200D0909090D21262639234D4D4D17380000262627272727272727262627
        2727272727270000}
      Value = 2
      DefaultValue = 0
      OnChange = FadeOutWheelRelease
      PopupMenu = SynthResModule.WheelMenu
    end
    object TempoSelect: TDigiWheel
      Tag = -1
      Left = 140
      Top = 2
      Width = 24
      Height = 11
      Cursor = crSizeNS
      Hint = '|Original sample tempo'
      Options = [wwAutoSize, wwIncMode]
      MoveSpeed = 4
      SlowMotionDiv = 4
      Min = 10
      Max = 999
      Value = 140
      DefaultValue = 120
      OnChange = TempoSelectChange
      OnRelease = TempoSelectRelease
      MouseButton = mbLeft
      HotSideX = 4
      HotSideY = 4
      PopupMenu = SynthResModule.WheelMenu
      Visible = False
      Color = clNone
      Font.Charset = ANSI_CHARSET
      Font.Color = 13025463
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      BmpList = SynthResModule.Digits11IL
      NullValue = 0
    end
    object LengthSelect: TDigiWheel
      Tag = -1
      Left = 186
      Top = 2
      Width = 24
      Height = 11
      Cursor = crSizeNS
      Hint = '|Original sample length'
      Options = [wwAutoSize, wwIncMode]
      MoveSpeed = 2
      SlowMotionDiv = 4
      Min = 1
      Max = 999
      Value = 4
      DefaultValue = 4
      OnChange = LengthSelectChange
      OnRelease = TempoSelectRelease
      MouseButton = mbLeft
      HotSideX = 4
      HotSideY = 4
      PopupMenu = SynthResModule.WheelMenu
      Visible = False
      Color = clNone
      Font.Charset = ANSI_CHARSET
      Font.Color = 13025463
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      BmpList = SynthResModule.Digits11IL
      NullValue = 0
    end
    object SliceScope: THQWAVScope
      Tag = -1
      Left = 0
      Top = 69
      Width = 129
      Height = 41
      Cursor = crCross
      BackColor = clBlack
      CenterColor = clGray
      LineColor = 14532279
      LineColor_Right = 14532279
      OnPaint = SliceScopePaint
      OnMouseDown = SliceScopeMouseDown
      OnMouseMove = SliceScopeMouseMove
      PopupMenu = SynthResModule.ScopeSliceMenu
      Visible = False
    end
    object SliceKeyLabel: TQuickLabel
      Tag = 1
      Left = 109
      Top = 57
      Width = 18
      Height = 11
      Cursor = crHandPoint
      Hint = '|Key to trigger selected slice'
      Options = [loTransparent, loNoFlicker]
      Font.Charset = DEFAULT_CHARSET
      Font.Color = 16047827
      Font.Height = -9
      Font.Name = 'Fruity fonts'
      Font.Style = []
      ParentFont = False
      OnMouseDown = SliceNameLabelMouseDown
    end
    object AutoFitBtn: TQuickBtn
      Tag = -1
      Left = 74
      Top = 43
      Width = 55
      Height = 11
      Cursor = crHandPoint
      Hint = '|Fit beat to project tempo right after loading'
      ParentFont = False
      ParentColor = True
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clSilver
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
      Style = FS_Transparent
      Spacing = 4
      TextAlign = ttaRight
      AccelKey = 0
      FXType = FX_Blend
      BmpList = SynthResModule.LEDIL
      OnClick = AutoDumpBtnClick
      Down = True
      PopupAlign = Popup_Normal
    end
    object DeClickBtn: TQuickBtn
      Tag = -1
      Left = 201
      Top = 18
      Width = 39
      Height = 11
      Cursor = crHandPoint
      Hint = '|Click removal'
      ParentFont = False
      ParentColor = True
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clSilver
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
      Style = FS_Transparent
      Spacing = 4
      TextAlign = ttaLeft
      AccelKey = 0
      FXType = FX_Blend
      BmpList = SynthResModule.LEDIL
      OnClick = FadeOutWheelRelease
      Down = True
      PopupAlign = Popup_Normal
    end
    object SliceNameLabel: TQuickLabel
      Left = 35
      Top = 57
      Width = 68
      Height = 11
      Cursor = crHandPoint
      Hint = '|^dSelected slice name'
      Alignment = taRightJustify
      Options = [loTransparent, loNoFlicker, loEndEllipsis]
      Font.Charset = DEFAULT_CHARSET
      Font.Color = 13416363
      Font.Height = -9
      Font.Name = 'Fruity fonts'
      Font.Style = []
      ParentFont = False
      OnMouseDown = SliceNameLabelMouseDown
    end
    object BottomPanel: TWPControl
      Left = 0
      Top = 187
      Width = 241
      Height = 53
      Align = alBottom
      Color = clMaroon
      ParentColor = False
      ShowHint = False
      object AnimateBtn: TQuickBtn
        Tag = -1
        Left = 1
        Top = 3
        Width = 63
        Height = 11
        Cursor = crHandPoint
        Hint = '|Animate display'
        ParentFont = False
        ParentColor = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clSilver
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
        Style = FS_Transparent
        Spacing = 4
        TextAlign = ttaRight
        AccelKey = 0
        FXType = FX_Blend
        BmpList = SynthResModule.LEDIL
        OnClick = AnimateBtnClick
        Down = True
        PopupAlign = Popup_Normal
      end
      object PlayToEndBtn: TQuickBtn
        Tag = -1
        Left = 64
        Top = 3
        Width = 68
        Height = 11
        Cursor = crHandPoint
        Hint = '|Play from slice to end of sample'
        ParentFont = False
        ParentColor = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clSilver
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
        Style = FS_Transparent
        Spacing = 4
        TextAlign = ttaRight
        AccelKey = 0
        FXType = FX_Blend
        BmpList = SynthResModule.LEDIL
        OnClick = PlayToEndBtnClick
        PopupAlign = Popup_Normal
      end
      object AutoSlice1Wheel: TWAVWheel
        Tag = -1
        Left = 178
        Top = 19
        Width = 23
        Height = 23
        Hint = '|Auto-slicing low threshold'
        Options = [wwPause]
        MoveSpeed = 8
        SlowMotionDiv = 4
        Max = 200
        Value = 100
        DefaultValue = 100
        OnChange = AutoSlice1WheelChange
        OnRelease = AutoSlice1WheelRelease
        MouseButton = mbLeft
        HotSideX = 5
        HotSideY = 6
        PopupMenu = SynthResModule.WheelMenu
        BmpList = SynthResModule.MainWheelIL
      end
      object AutoSlice2Wheel: TWAVWheel
        Tag = -1
        Left = 212
        Top = 19
        Width = 23
        Height = 23
        Hint = '|Auto-slicing high threshold'
        Options = [wwPause]
        MoveSpeed = 8
        SlowMotionDiv = 4
        Max = 200
        Value = 100
        DefaultValue = 100
        OnChange = AutoSlice1WheelChange
        OnRelease = AutoSlice1WheelRelease
        MouseButton = mbLeft
        HotSideX = 5
        HotSideY = 6
        PopupMenu = SynthResModule.WheelMenu
        BmpList = SynthResModule.MainWheelIL
      end
      object LogoBtn: TQuickBtn
        Tag = -1
        Left = 4
        Top = 31
        Width = 82
        Height = 18
        Enabled = False
        ParentFont = False
        ParentColor = False
        Color = 6709335
        Font.Charset = ANSI_CHARSET
        Font.Color = 13025463
        Font.Height = -9
        Font.Name = 'Fruity fonts'
        Font.Style = []
        Options = [tbDirectClick, tbHasOnOverGlyph, tbAutoSize]
        AccelKey = 0
        FXType = FX_Blend
        FXWhen = FX_OnDemand
        FXAttack = 8
        FXRelease = 8
        Glyph.ILCount = 2
        BmpList = SynthResModule.LogoIL
        StayDown = False
      end
    end
  end
end